home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2000 #4 / Amiga Plus CD - 2000 - No. 4.iso / Tools / Dev / AmigaTalk / Intuition / Screen.p < prev    next >
Encoding:
Text File  |  2000-05-07  |  5.5 KB  |  160 lines
  1. pTempVar <- <primitive 110 33 >
  2. <primitive 112 pTempVar 1  " new: " \
  3.   #( #[ 16r21 16r60 16r50 16r61 16r20 16rF3 16rF5] \
  4.     #(  )) >
  5.  
  6. <primitive 112 pTempVar 2  " open " \
  7.   #( #[ 16r51 16r11 16r10 16rFA 16r03 16rB4 16rF2 16rF5] \
  8.     #(  )) >
  9.  
  10. <primitive 112 pTempVar 3  " getScreenModeID " \
  11.   #( #[ 16r11 16rF3 16rF5] \
  12.     #(  )) >
  13.  
  14. <primitive 112 pTempVar 4  " setScreenModeID: " \
  15.   #( #[ 16r21 16r61 16rF5] \
  16.     #(  )) >
  17.  
  18. <primitive 112 pTempVar 5  " close " \
  19.   #( #[ 16r50 16r10 16rFA 16r02 16rB4 16rF2 16r5D 16r60 16rF5] \
  20.     #(  )) >
  21.  
  22. <primitive 112 pTempVar 6  " setScreenPens: " \
  23.   #( #[ 16r21 16r0A 16r30 16r72 16r21 16r0A 16r31 16r73 16r53 16r54 16r22 \
  24.         16r10 16rFA 16r04 16rB4 16rF2 16r53 16r55 16r23 16r10 16rFA \
  25.         16r04 16rB4 16rF2 16r22 16r67 16r23 16r68 16rF5] \
  26.     #(  )) >
  27.  
  28. <primitive 112 pTempVar 7  " setScreenSize: " \
  29.   #( #[ 16r21 16r0A 16r30 16r72 16r21 16r0A 16r31 16r73 16r53 16r52 16r22 \
  30.         16r10 16rFA 16r04 16rB4 16rF2 16r53 16r53 16r23 16r10 16rFA \
  31.         16r04 16rB4 16rF2 16r22 16r64 16r23 16r65 16rF5] \
  32.     #(  )) >
  33.  
  34. <primitive 112 pTempVar 8  " setOrigin: " \
  35.   #( #[ 16r21 16r0A 16r30 16r72 16r21 16r0A 16r31 16r73 16r53 16r50 16r22 \
  36.         16r10 16rFA 16r04 16rB4 16rF2 16r53 16r51 16r23 16r10 16rFA \
  37.         16r04 16rB4 16rF2 16r22 16r62 16r23 16r63 16rF5] \
  38.     #(  )) >
  39.  
  40. <primitive 112 pTempVar 9  " getBitMapName " \
  41.   #( #[ 16r52 16r30 16r10 16rFA 16r03 16rB4 16rF1 16r6B 16rF3 16rF5] \
  42.     #( 12  )) >
  43.  
  44. <primitive 112 pTempVar 10  " getFontName " \
  45.   #( #[ 16r52 16r57 16r10 16rFA 16r03 16rB4 16rF1 16r6A 16rF3 16rF5] \
  46.     #(  )) >
  47.  
  48. <primitive 112 pTempVar 11  " getDepth " \
  49.   #( #[ 16r52 16r59 16r10 16rFA 16r03 16rB4 16rF1 16r66 16rF3 16rF5] \
  50.     #(  )) >
  51.  
  52. <primitive 112 pTempVar 12  " getTitle " \
  53.   #( #[ 16r52 16r58 16r10 16rFA 16r03 16rB4 16rF1 16r60 16rF3 16rF5] \
  54.     #(  )) >
  55.  
  56. <primitive 112 pTempVar 13  " getViewMode " \
  57.   #( #[ 16r52 16r30 16r10 16rFA 16r03 16rB4 16rF1 16r6C 16rF3 16rF5] \
  58.     #( 10  )) >
  59.  
  60. <primitive 112 pTempVar 14  " getType " \
  61.   #( #[ 16r52 16r30 16r10 16rFA 16r03 16rB4 16rF1 16r6D 16rF3 16rF5] \
  62.     #( 11  )) >
  63.  
  64. <primitive 112 pTempVar 15  " getFlags " \
  65.   #( #[ 16r52 16r56 16r10 16rFA 16r03 16rB4 16rF1 16r69 16rF3 16rF5] \
  66.     #(  )) >
  67.  
  68. <primitive 112 pTempVar 16  " getScreenPens " \
  69.   #( #[ 16r52 16r54 16r10 16rFA 16r03 16rB4 16r67 16r52 16r55 16r10 16rFA \
  70.         16r03 16rB4 16r68 16r17 16r18 16r81 16r00 16rF3 16rF5] \
  71.     #( #@  )) >
  72.  
  73. <primitive 112 pTempVar 17  " getScreenSize " \
  74.   #( #[ 16r52 16r52 16r10 16rFA 16r03 16rB4 16r64 16r52 16r53 16r10 16rFA \
  75.         16r03 16rB4 16r65 16r14 16r15 16r81 16r00 16rF3 16rF5] \
  76.     #( #@  )) >
  77.  
  78. <primitive 112 pTempVar 18  " getOrigin " \
  79.   #( #[ 16r52 16r50 16r10 16rFA 16r03 16rB4 16r62 16r52 16r51 16r10 16rFA \
  80.         16r03 16rB4 16r63 16r12 16r13 16r81 16r00 16rF3 16rF5] \
  81.     #( #@  )) >
  82.  
  83. <primitive 112 pTempVar 19  " setBitMap: " \
  84.   #( #[ 16r53 16r30 16r21 16r10 16rFA 16r04 16rB4 16rF2 16r21 16r6B 16rF5 \
  85.        ] \
  86.     #( 12  )) >
  87.  
  88. <primitive 112 pTempVar 20  " setFont: " \
  89.   #( #[ 16r53 16r57 16r21 16r10 16rFA 16r04 16rB4 16rF2 16r21 16r6A 16rF5 \
  90.        ] \
  91.     #(  )) >
  92.  
  93. <primitive 112 pTempVar 21  " setDepth: " \
  94.   #( #[ 16r53 16r59 16r21 16r10 16rFA 16r04 16rB4 16rF2 16r21 16r66 16rF5 \
  95.        ] \
  96.     #(  )) >
  97.  
  98. <primitive 112 pTempVar 22  " setTitle: " \
  99.   #( #[ 16r53 16r58 16r21 16r10 16rFA 16r04 16rB4 16rF2 16r21 16r60 16rF5 \
  100.        ] \
  101.     #(  )) >
  102.  
  103. <primitive 112 pTempVar 23  " setViewMode: " \
  104.   #( #[ 16r53 16r30 16r21 16r10 16rFA 16r04 16rB4 16rF2 16r21 16r6C 16rF5 \
  105.        ] \
  106.     #( 10  )) >
  107.  
  108. <primitive 112 pTempVar 24  " setType: " \
  109.   #( #[ 16r53 16r30 16r21 16r10 16rFA 16r04 16rB4 16rF2 16r21 16r6D 16rF5 \
  110.        ] \
  111.     #( 11  )) >
  112.  
  113. <primitive 112 pTempVar 25  " showTitle " \
  114.   #( #[ 16r54 16r30 16r10 16rFA 16r03 16rB4 16rF2 16rF5] \
  115.     #( 'ShowTitle'  )) >
  116.  
  117. <primitive 112 pTempVar 26  " turnOffTitle " \
  118.   #( #[ 16r54 16r30 16r10 16rFA 16r03 16rB4 16rF2 16rF5] \
  119.     #( 'TurnOffTitle'  )) >
  120.  
  121. <primitive 112 pTempVar 27  " screenToFront " \
  122.   #( #[ 16r54 16r30 16r10 16rFA 16r03 16rB4 16rF2 16rF5] \
  123.     #( 'ScreenToFront'  )) >
  124.  
  125. <primitive 112 pTempVar 28  " screenToBack " \
  126.   #( #[ 16r54 16r30 16r10 16rFA 16r03 16rB4 16rF2 16rF5] \
  127.     #( 'ScreenToBack'  )) >
  128.  
  129. <primitive 112 pTempVar 29  " displayBeep " \
  130.   #( #[ 16r54 16r30 16r10 16rFA 16r03 16rB4 16rF2 16rF5] \
  131.     #( 'DisplayBeep'  )) >
  132.  
  133. <primitive 112 pTempVar 30  " reOpenScreen " \
  134.   #( #[ 16r58 16r10 16rFA 16r02 16rB4 16rF2 16rF5] \
  135.     #(  )) >
  136.  
  137. <primitive 112 pTempVar 31  " redrawScreen " \
  138.   #( #[ 16r57 16r10 16rFA 16r02 16rB4 16rF2 16rF5] \
  139.     #(  )) >
  140.  
  141. <primitive 112 pTempVar 32  " pushScreenDown: " \
  142.   #( #[ 16r56 16r21 16r10 16rFA 16r03 16rB4 16rF2 16rF5] \
  143.     #(  )) >
  144.  
  145. <primitive 112 pTempVar 33  " pullScreenUp: " \
  146.   #( #[ 16r55 16r21 16r10 16rFA 16r03 16rB4 16rF2 16rF5] \
  147.     #(  )) >
  148.  
  149. <primitive 98 #Screen \
  150.   <primitive 97 #Screen #Glyph #AmigaTalk:Intuition/Screen.st \
  151.    #(  #screenTitle #screenModeID #leftEdge #topEdge #width #height #depth #detailPen \
  152.         #flags #fontName #bitMapName #viewMode #type ) \
  153.    #( #new: #open #getScreenModeID #setScreenModeID: #close #setScreenPens:  \
  154.        #setScreenSize: #setOrigin: #getBitMapName #getFontName #getDepth #getTitle #getViewMode  \
  155.        #getType #getFlags #getScreenPens #getScreenSize #getOrigin #setBitMap: #setFont:  \
  156.        #setDepth: #setTitle: #setViewMode: #setType: #showTitle #turnOffTitle #screenToFront  \
  157.        #screenToBack #displayBeep #reOpenScreen #redrawScreen #pushScreenDown: #pullScreenUp:  ) \
  158.   pTempVar 4 5 >>
  159.  
  160.